Year 34 - Seek and Destroy 1

-- 7 Billion Humans (2214M) --
-- 34: Seek and Destroy 1 by @commonnickname and @abfipes12 --
-- calculated expected => 71.4% ; failed 21 out of 100 => 79% successful --

mem1 = nearest wall
step n
mem2 = nearest wall
step n
mem3 = nearest wall
step n
if mem1 == mem2 and
 mem2 == mem3:
	mem2 = nearest datacube
	step n
	jump a
endif
if mem1 != mem2 and
 mem2 == mem3:
	mem4 = set 4
endif
if mem1 == mem2 and
 mem2 != mem3:
	mem4 = set 2
endif
if mem1 != mem2 and
 mem2 != mem3:
	mem4 = set 1
endif
mem2 = nearest datacube
step n
mem1 = nearest datacube
if mem1 < mem2:
	mem2 = nearest datacube
endif
a:
step n
mem1 = nearest datacube
if mem1 < mem2:
	mem2 = nearest datacube
endif
step n
mem1 = nearest datacube
if mem1 < mem2:
	mem2 = nearest datacube
endif
step n
mem1 = nearest datacube
if mem1 < mem2:
	mem2 = nearest datacube
endif
step n
mem1 = nearest datacube
if mem1 < mem2:
	mem2 = nearest datacube
endif
if mem4 == 0 or
 mem4 == 4:
	step n
	b:
	mem1 = nearest datacube
	if mem1 <= mem2:
		pickup n
	else:
		pickup mem2
	endif
	jump c
endif
if mem4 == 2:
	if n < mem2:
		pickup n
	else:
		pickup mem2
	endif
	c:
	mem4 = nearest shredder
	giveto mem4
endif
jump b